Public Class NCicloLectivo

    Public Function cargarCiclo(ByVal ciclo As Entidades.ECicloLectivo) As Boolean
        'utiliza la capa de datos
        Dim oDatos As New Datos.DCicloLectivo
        Dim band As Boolean
        Try
            band = oDatos.cargarCiclo(ciclo)
        Catch ex As Exception
            Throw New ArgumentException(ex.Message)
        Finally
            oDatos = Nothing
        End Try
        Return band
    End Function

    Public Function modificarCiclo(ByVal cicloviejo As Integer, ByVal ciclonuevo As Integer) As Boolean
        'utiliza la capa de datos
        Dim oDatos As New Datos.DCicloLectivo
        Dim band As Boolean
        Try
            band = oDatos.modificarCiclo(cicloviejo, ciclonuevo)
        Catch ex As Exception
            Throw New ArgumentException(ex.Message)
        Finally
            oDatos = Nothing
        End Try
        Return band
    End Function

    Public Function TraerCiclo(ByVal curso As Entidades.ECurso, ByVal legajo As Integer) As Integer
        'utiliza la capa de datos
        Dim oDatos As New Datos.DCicloLectivo

        Try
            Return oDatos.TraerCiclo(curso, legajo)
        Catch ex As Exception
            Throw New ArgumentException(ex.Message)
        Finally
            oDatos = Nothing
        End Try
    End Function

    'Public Function calcularPromedioAnual(ByVal ciclo As Entidades.ECicloLectivo) As Boolean

    '    Dim oDatos As New Datos.DCicloLectivo
    '    Dim band As Boolean
    '    Try
    '        band = oDatos.calcularPromedioAnual(ciclo)
    '    Catch ex As Exception
    '        Throw New ArgumentException(ex.Message)
    '    Finally
    '        oDatos = Nothing
    '    End Try
    '    Return band
    'End Function

End Class
